eps=.000314159; % A very small random (pi/1000) positive number 
proof=0; lowres=1; crs=2; dover=3; canon=5; smoke=6;	% symbolic names of modes
designsize ptsize; % ignore error messages you get with old MF!
if mode<0: mmode=-mode; new mode; mode=mmode;	% negative modes assume \\{mag} is set
else: mag=1;
fi;
magnification mag;
if mode=proof: proofmode; titletrace;
	pixels=18*mag; blacker=0; overcorr=1;	% for initial design of characters
else:	if mode=lowres: fntmode; tfxmode; no modtrace;
		pixels=(200/72.27)mag; blacker=.65; overcorr=.4;	% XGP, etc.
	else: if mode=crs: crsmode; tfxmode; titletrace; no modtrace;
			pixels=(16000/(3*72.27))mag; blacker=4; overcorr=1;	% Alphatype
		else: if mode=dover: ocmode; tfmmode; dotwdmode; no modtrace;
				overcorr=.6;
				pixels=(384/72.27)mag; blacker=1.2;  % Dover
			else: if mode=canon: rstmode; tfxmode; no modtrace;
					pixels=(240/72.27)mag;    % mode=+-5
					blacker=.2; overcorr=.4;  % Canon
			else: if mode=smoke: proofmode; titletrace; no points;
					no modtrace;
					pixels=72;
					blacker=0; overcorr=1;
				else: input mode;
				fi; fi;
			fi;
		fi;
	fi;
fi;
fontfacebyte 254-2*ptsize;
vresolution pixels; hresolution pixels;